home *** CD-ROM | disk | FTP | other *** search
/ Apple Software Dispatch / Apple Software Dispatch.iso / QuickTime / QuickTime™ / QuickTime™.rsrc / CDEF_101.txt < prev    next >
Text File  |  1993-06-29  |  45KB  |  810 lines

  1. start:
  2. 00000000  4E56 FF56                link       A6, -0x00AA
  3. 00000004  48E7 0F18                movem.l    -[A7], D4,D5,D6,D7,A3,A4
  4. 00000008  2C2E 0008                move.l     D6, [A6 + 0x8]
  5. 0000000C  3E2E 000C                move.w     D7, [A6 + 0xC]
  6. 00000010  266E 000E                movea.l    A3, [A6 + 0xE]
  7. 00000014  7000                     moveq.l    D0, 0x00
  8. 00000016  2D40 FFEE                move.l     [A6 - 0x12], D0
  9. 0000001A  42AE FFFC                clr.l      [A6 - 0x4]
  10. 0000001E  426E FFFA                clr.w      [A6 - 0x6]
  11. 00000022  486E FFB4                pea.l      [A6 - 0x4C]
  12. 00000026  A874                     syscall    GetPort
  13. 00000028  2053                     movea.l    A0, [A3]
  14. 0000002A  2D68 0004 FFB8           move.l     [A6 - 0x48], [A0 + 0x4]
  15. 00000030  2F28 0004                move.l     -[A7], [A0 + 0x4]
  16. 00000034  A873                     syscall    SetPort
  17. 00000036  206E FFB8                movea.l    A0, [A6 - 0x48]
  18. 0000003A  3028 0006                move.w     D0, [A0 + 0x6]
  19. 0000003E  48C0                     ext.l      D0
  20. 00000040  323C 8000                move.w     D1, 0x8000
  21. 00000044  C240                     and.w      D1, D0
  22. 00000046  7000                     moveq.l    D0, 0x00
  23. 00000048  3001                     move.w     D0, D1
  24. 0000004A  4A80                     tst.l      D0
  25. 0000004C  56C0                     sne        D0
  26. 0000004E  4400                     neg.b      D0
  27. 00000050  49C0                     lea.l      A4, D0
  28. 00000052  1A00                     move.b     D5, D0
  29. 00000054  486E FFBC                pea.l      [A6 - 0x44]
  30. 00000058  A898                     syscall    GetPenState
  31. 0000005A  206E FFB8                movea.l    A0, [A6 - 0x48]
  32. 0000005E  3D68 0048 FFF2           move.w     [A6 - 0xE], [A0 + 0x48]
  33. 00000064  4A05                     tst.b      D5
  34. 00000066  6708                     beq        +0xA /* 00000070 */
  35. 00000068  486E FFF4                pea.l      [A6 - 0xC]
  36. 0000006C  AA19                     syscall    GetForeColor
  37. 0000006E  600A                     bra        +0xC /* 0000007A */
  38. label00000070:
  39. 00000070  206E FFB8                movea.l    A0, [A6 - 0x48]
  40. 00000074  2D68 0050 FFDA           move.l     [A6 - 0x26], [A0 + 0x50]
  41. label0000007A:
  42. 0000007A  0C47 0003                cmpi.w     D7, 0x3
  43. 0000007E  661C                     bne        +0x1E /* 0000009C */
  44. 00000080  701C                     moveq.l    D0, 0x1C
  45. 00000082  A322                     syscall    NewHandleClear, flags=3
  46. 00000084  2D48 FFB0                move.l     [A6 - 0x50], A0
  47. 00000088  2053                     movea.l    A0, [A3]
  48. 0000008A  216E FFB0 001C           move.l     [A0 + 0x1C], [A6 - 0x50]
  49. 00000090  2053                     movea.l    A0, [A3]
  50. 00000092  70FF                     moveq.l    D0, 0xFFFFFFFF
  51. 00000094  2140 0020                move.l     [A0 + 0x20], D0
  52. 00000098  6000 05A6                bra        +0x5A8 /* 00000640 */
  53. label0000009C:
  54. 0000009C  2053                     movea.l    A0, [A3]
  55. 0000009E  2D48 FFD6                move.l     [A6 - 0x2A], A0
  56. 000000A2  2068 001C                movea.l    A0, [A0 + 0x1C]
  57. 000000A6  2D48 FFDE                move.l     [A6 - 0x22], A0
  58. 000000AA  2D50 FFE2                move.l     [A6 - 0x1E], [A0]
  59. 000000AE  4AAE FFDE                tst.l      [A6 - 0x22]
  60. 000000B2  6700 058C                beq        +0x58E /* 00000640 */
  61. 000000B6  206E FFE2                movea.l    A0, [A6 - 0x1E]
  62. 000000BA  2850                     movea.l    A4, [A0]
  63. 000000BC  4A28 0015                tst.b      [A0 + 0x15]
  64. 000000C0  664C                     bne        +0x4E /* 0000010E */
  65. 000000C2  206E FFD6                movea.l    A0, [A6 - 0x2A]
  66. 000000C6  4A68 0014                tst.w      [A0 + 0x14]
  67. 000000CA  6742                     beq        +0x44 /* 0000010E */
  68. 000000CC  200C                     move.l     D0, A4
  69. 000000CE  663E                     bne        +0x40 /* 0000010E */
  70. 000000D0  598F                     subq.l     A7, 4
  71. 000000D2  206E FFD6                movea.l    A0, [A6 - 0x2A]
  72. 000000D6  3F28 0014                move.w     -[A7], [A0 + 0x14]
  73. 000000DA  A9BF                     syscall    GetRMenu
  74. 000000DC  285F                     movea.l    A4, [A7]+
  75. 000000DE  200C                     move.l     D0, A4
  76. 000000E0  6700 055E                beq        +0x560 /* 00000640 */
  77. 000000E4  4A94                     tst.l      [A4]
  78. 000000E6  6700 0558                beq        +0x55A /* 00000640 */
  79. 000000EA  206E FFDE                movea.l    A0, [A6 - 0x22]
  80. 000000EE  2050                     movea.l    A0, [A0]
  81. 000000F0  208C                     move.l     [A0], A4
  82. 000000F2  2F0C                     move.l     -[A7], A4
  83. 000000F4  70FF                     moveq.l    D0, 0xFFFFFFFF
  84. 000000F6  3F00                     move.w     -[A7], D0
  85. 000000F8  A935                     syscall    InsertMenu
  86. 000000FA  2053                     movea.l    A0, [A3]
  87. 000000FC  317C 0001 0014           move.w     [A0 + 0x14], 0x1
  88. 00000102  206E FFDE                movea.l    A0, [A6 - 0x22]
  89. 00000106  2050                     movea.l    A0, [A0]
  90. 00000108  117C 0001 0016           move.b     [A0 + 0x16], 0x1
  91. label0000010E:
  92. 0000010E  0C47 0004                cmpi.w     D7, 0x4
  93. 00000112  662A                     bne        +0x2C /* 0000013E */
  94. 00000114  206E FFDE                movea.l    A0, [A6 - 0x22]
  95. 00000118  2050                     movea.l    A0, [A0]
  96. 0000011A  4A28 0016                tst.b      [A0 + 0x16]
  97. 0000011E  670A                     beq        +0xC /* 0000012A */
  98. 00000120  2054                     movea.l    A0, [A4]
  99. 00000122  3F10                     move.w     -[A7], [A0]
  100. 00000124  A936                     syscall    DeleteMenu
  101. 00000126  2F0C                     move.l     -[A7], A4
  102. 00000128  A932                     syscall    DisposeMenu
  103. label0000012A:
  104. 0000012A  2053                     movea.l    A0, [A3]
  105. 0000012C  2068 001C                movea.l    A0, [A0 + 0x1C]
  106. 00000130  A023                     syscall    DisposHandle/DisposeHandle
  107. 00000132  2053                     movea.l    A0, [A3]
  108. 00000134  7000                     moveq.l    D0, 0x00
  109. 00000136  2140 001C                move.l     [A0 + 0x1C], D0
  110. 0000013A  6000 0504                bra        +0x506 /* 00000640 */
  111. label0000013E:
  112. 0000013E  200C                     move.l     D0, A4
  113. 00000140  6700 04FE                beq        +0x500 /* 00000640 */
  114. 00000144  0C47 000A                cmpi.w     D7, 0xA /* '\n' */
  115. 00000148  6706                     beq        +0x8 /* 00000150 */
  116. 0000014A  0C47 0002                cmpi.w     D7, 0x2
  117. 0000014E  660A                     bne        +0xC /* 0000015A */
  118. label00000150:
  119. 00000150  206E FFDE                movea.l    A0, [A6 - 0x22]
  120. 00000154  2050                     movea.l    A0, [A0]
  121. 00000156  4228 0017                clr.b      [A0 + 0x17]
  122. label0000015A:
  123. 0000015A  206E FFDE                movea.l    A0, [A6 - 0x22]
  124. 0000015E  2D50 FFE2                move.l     [A6 - 0x1E], [A0]
  125. 00000162  2054                     movea.l    A0, [A4]
  126. 00000164  70FF                     moveq.l    D0, 0xFFFFFFFF
  127. 00000166  B068 0002                cmp.w      D0, [A0 + 0x2]
  128. 0000016A  671A                     beq        +0x1C /* 00000186 */
  129. 0000016C  70FF                     moveq.l    D0, 0xFFFFFFFF
  130. 0000016E  B068 0004                cmp.w      D0, [A0 + 0x4]
  131. 00000172  6712                     beq        +0x14 /* 00000186 */
  132. 00000174  206E FFE2                movea.l    A0, [A6 - 0x1E]
  133. 00000178  4A28 0015                tst.b      [A0 + 0x15]
  134. 0000017C  6708                     beq        +0xA /* 00000186 */
  135. 0000017E  4A28 0017                tst.b      [A0 + 0x17]
  136. 00000182  6600 0114                bne        +0x116 /* 00000298 */
  137. label00000186:
  138. 00000186  206E FFE2                movea.l    A0, [A6 - 0x1E]
  139. 0000018A  4A28 0015                tst.b      [A0 + 0x15]
  140. 0000018E  663C                     bne        +0x3E /* 000001CC */
  141. 00000190  486E FFE6                pea.l      [A6 - 0x1A]
  142. 00000194  A88B                     syscall    GetFontInfo
  143. 00000196  206E FFDE                movea.l    A0, [A6 - 0x22]
  144. 0000019A  2050                     movea.l    A0, [A0]
  145. 0000019C  2D48 FFE2                move.l     [A6 - 0x1E], A0
  146. 000001A0  5888                     addq.l     A0, 4
  147. 000001A2  43EE FFE6                lea.l      A1, [A6 - 0x1A]
  148. 000001A6  20D9                     move.l     [A0]+, [A1]+
  149. 000001A8  20D9                     move.l     [A0]+, [A1]+
  150. 000001AA  2053                     movea.l    A0, [A3]
  151. 000001AC  2D48 FFD6                move.l     [A6 - 0x2A], A0
  152. 000001B0  317C 0001 0012           move.w     [A0 + 0x12], 0x1
  153. 000001B6  206E FFE2                movea.l    A0, [A6 - 0x1E]
  154. 000001BA  117C 0001 0015           move.b     [A0 + 0x15], 0x1
  155. 000001C0  206E FFD6                movea.l    A0, [A6 - 0x2A]
  156. 000001C4  317C 0001 0014           move.w     [A0 + 0x14], 0x1
  157. 000001CA  600E                     bra        +0x10 /* 000001DA */
  158. label000001CC:
  159. 000001CC  206E FFE2                movea.l    A0, [A6 - 0x1E]
  160. 000001D0  43EE FFE6                lea.l      A1, [A6 - 0x1A]
  161. 000001D4  5888                     addq.l     A0, 4
  162. 000001D6  22D8                     move.l     [A1]+, [A0]+
  163. 000001D8  22D8                     move.l     [A1]+, [A0]+
  164. label000001DA:
  165. 000001DA  206E FFE2                movea.l    A0, [A6 - 0x1E]
  166. 000001DE  117C 0001 0017           move.b     [A0 + 0x17], 0x1
  167. 000001E4  2053                     movea.l    A0, [A3]
  168. 000001E6  2D48 FFD6                move.l     [A6 - 0x2A], A0
  169. 000001EA  3D68 0008 FFCE           move.w     [A6 - 0x32], [A0 + 0x8]
  170. 000001F0  3D68 000A FFD0           move.w     [A6 - 0x30], [A0 + 0xA]
  171. 000001F6  302E FFCE                move.w     D0, [A6 - 0x32]
  172. 000001FA  48C0                     ext.l      D0
  173. 000001FC  322E FFE6                move.w     D1, [A6 - 0x1A]
  174. 00000200  48C1                     ext.l      D1
  175. 00000202  D280                     add.l      D1, D0
  176. 00000204  302E FFE8                move.w     D0, [A6 - 0x18]
  177. 00000208  48C0                     ext.l      D0
  178. 0000020A  D081                     add.l      D0, D1
  179. 0000020C  322E FFEC                move.w     D1, [A6 - 0x14]
  180. 00000210  48C1                     ext.l      D1
  181. 00000212  D280                     add.l      D1, D0
  182. 00000214  5641                     addq.w     D1, 3
  183. 00000216  3D41 FFD2                move.w     [A6 - 0x2E], D1
  184. 0000021A  2F0C                     move.l     -[A7], A4
  185. 0000021C  A948                     syscall    CalcMenuSize
  186. 0000021E  2D53 FFD6                move.l     [A6 - 0x2A], [A3]
  187. 00000222  7001                     moveq.l    D0, 0x01
  188. 00000224  B06E 0012                cmp.w      D0, [A6 + 0x12]
  189. 00000228  660C                     bne        +0xE /* 00000236 */
  190. 0000022A  206E FFD6                movea.l    A0, [A6 - 0x2A]
  191. 0000022E  3D68 000E FFD4           move.w     [A6 - 0x2C], [A0 + 0xE]
  192. 00000234  6034                     bra        +0x36 /* 0000026A */
  193. label00000236:
  194. 00000236  2054                     movea.l    A0, [A4]
  195. 00000238  3028 0002                move.w     D0, [A0 + 0x2]
  196. 0000023C  48C0                     ext.l      D0
  197. 0000023E  322E FFD0                move.w     D1, [A6 - 0x30]
  198. 00000242  48C1                     ext.l      D1
  199. 00000244  D280                     add.l      D1, D0
  200. 00000246  5681                     addq.l     D1, 3
  201. 00000248  302E FFEA                move.w     D0, [A6 - 0x16]
  202. 0000024C  48C0                     ext.l      D0
  203. 0000024E  D081                     add.l      D0, D1
  204. 00000250  5A40                     addq.w     D0, 5
  205. 00000252  3D40 FFD4                move.w     [A6 - 0x2C], D0
  206. 00000256  206E FFD6                movea.l    A0, [A6 - 0x2A]
  207. 0000025A  302E FFD4                move.w     D0, [A6 - 0x2C]
  208. 0000025E  B068 000E                cmp.w      D0, [A0 + 0xE]
  209. 00000262  6F06                     ble        +0x8 /* 0000026A */
  210. 00000264  3D68 000E FFD4           move.w     [A6 - 0x2C], [A0 + 0xE]
  211. label0000026A:
  212. 0000026A  206E FFDE                movea.l    A0, [A6 - 0x22]
  213. 0000026E  2050                     movea.l    A0, [A0]
  214. 00000270  41E8 000C                lea.l      A0, [A0 + 0xC]
  215. 00000274  43EE FFCE                lea.l      A1, [A6 - 0x32]
  216. 00000278  20D9                     move.l     [A0]+, [A1]+
  217. 0000027A  20D9                     move.l     [A0]+, [A1]+
  218. 0000027C  558F                     subq.l     A7, 2
  219. 0000027E  2F0C                     move.l     -[A7], A4
  220. 00000280  A950                     syscall    CountMItems
  221. 00000282  206E FFD6                movea.l    A0, [A6 - 0x2A]
  222. 00000286  315F 0016                move.w     [A0 + 0x16], [A7]+
  223. 0000028A  206E FFDE                movea.l    A0, [A6 - 0x22]
  224. 0000028E  2050                     movea.l    A0, [A0]
  225. 00000290  117C 0001 0017           move.b     [A0 + 0x17], 0x1
  226. 00000296  601E                     bra        +0x20 /* 000002B6 */
  227. label00000298:
  228. 00000298  206E FFE2                movea.l    A0, [A6 - 0x1E]
  229. 0000029C  43EE FFCE                lea.l      A1, [A6 - 0x32]
  230. 000002A0  41E8 000C                lea.l      A0, [A0 + 0xC]
  231. 000002A4  22D8                     move.l     [A1]+, [A0]+
  232. 000002A6  22D8                     move.l     [A1]+, [A0]+
  233. 000002A8  206E FFE2                movea.l    A0, [A6 - 0x1E]
  234. 000002AC  43EE FFE6                lea.l      A1, [A6 - 0x1A]
  235. 000002B0  5888                     addq.l     A0, 4
  236. 000002B2  22D8                     move.l     [A1]+, [A0]+
  237. 000002B4  22D8                     move.l     [A1]+, [A0]+
  238. label000002B6:
  239. 000002B6  3007                     move.w     D0, D7
  240. 000002B8  671C                     beq        +0x1E /* 000002D6 */
  241. 000002BA  5340                     subq.w     D0, 1
  242. 000002BC  6700 01B2                beq        +0x1B4 /* 00000470 */
  243. 000002C0  5340                     subq.w     D0, 1
  244. 000002C2  6700 0362                beq        +0x364 /* 00000626 */
  245. 000002C6  5D40                     subq.w     D0, 6
  246. 000002C8  6700 01DE                beq        +0x1E0 /* 000004A8 */
  247. 000002CC  5540                     subq.w     D0, 2
  248. 000002CE  6700 0368                beq        +0x36A /* 00000638 */
  249. 000002D2  6000 036C                bra        +0x36E /* 00000640 */
  250. label000002D6:
  251. 000002D6  2053                     movea.l    A0, [A3]
  252. 000002D8  7001                     moveq.l    D0, 0x01
  253. 000002DA  B068 0016                cmp.w      D0, [A0 + 0x16]
  254. 000002DE  5DC0                     slt        D0
  255. 000002E0  4400                     neg.b      D0
  256. 000002E2  49C0                     lea.l      A4, D0
  257. 000002E4  1D40 FFAF                move.b     [A6 - 0x51], D0
  258. 000002E8  206E FFDE                movea.l    A0, [A6 - 0x22]
  259. 000002EC  2050                     movea.l    A0, [A0]
  260. 000002EE  3028 001A                move.w     D0, [A0 + 0x1A]
  261. 000002F2  48C0                     ext.l      D0
  262. 000002F4  2053                     movea.l    A0, [A3]
  263. 000002F6  7200                     moveq.l    D1, 0x00
  264. 000002F8  1228 0011                move.b     D1, [A0 + 0x11]
  265. 000002FC  D280                     add.l      D1, D0
  266. 000002FE  7001                     moveq.l    D0, 0x01
  267. 00000300  B081                     cmp.l      D0, D1
  268. 00000302  6700 0154                beq        +0x156 /* 00000458 */
  269. 00000306  7001                     moveq.l    D0, 0x01
  270. 00000308  3F00                     move.w     -[A7], D0
  271. 0000030A  3F00                     move.w     -[A7], D0
  272. 0000030C  A89B                     syscall    PenSize
  273. 0000030E  4A05                     tst.b      D5
  274. 00000310  6708                     beq        +0xA /* 0000031A */
  275. 00000312  486E FFFA                pea.l      [A6 - 0x6]
  276. 00000316  AA14                     syscall    RGBForeColor
  277. 00000318  6006                     bra        +0x8 /* 00000320 */
  278. label0000031A:
  279. 0000031A  7021                     moveq.l    D0, 0x21
  280. 0000031C  2F00                     move.l     -[A7], D0
  281. 0000031E  A862                     syscall    ForeColor
  282. label00000320:
  283. 00000320  302E FFCE                move.w     D0, [A6 - 0x32]
  284. 00000324  5240                     addq.w     D0, 1
  285. 00000326  3D40 FF9C                move.w     [A6 - 0x64], D0
  286. 0000032A  302E FFEA                move.w     D0, [A6 - 0x16]
  287. 0000032E  D06E FFD0                add.w      D0, [A6 - 0x30]
  288. 00000332  3D40 FF9E                move.w     [A6 - 0x62], D0
  289. 00000336  302E FFD4                move.w     D0, [A6 - 0x2C]
  290. 0000033A  48C0                     ext.l      D0
  291. 0000033C  5580                     subq.l     D0, 2
  292. 0000033E  322E FFEA                move.w     D1, [A6 - 0x16]
  293. 00000342  48C1                     ext.l      D1
  294. 00000344  5681                     addq.l     D1, 3
  295. 00000346  9041                     sub.w      D0, D1
  296. 00000348  3D40 FFA2                move.w     [A6 - 0x5E], D0
  297. 0000034C  906E FF9E                sub.w      D0, [A6 - 0x62]
  298. 00000350  3D40 FFA4                move.w     [A6 - 0x5C], D0
  299. 00000354  302E FFD2                move.w     D0, [A6 - 0x2E]
  300. 00000358  5540                     subq.w     D0, 2
  301. 0000035A  3D40 FFA0                move.w     [A6 - 0x60], D0
  302. 0000035E  2F0C                     move.l     -[A7], A4
  303. 00000360  2053                     movea.l    A0, [A3]
  304. 00000362  3F28 0012                move.w     -[A7], [A0 + 0x12]
  305. 00000366  486E FF5C                pea.l      [A6 - 0xA4]
  306. 0000036A  A946                     syscall    GetMenuItemText/GetItem
  307. 0000036C  486E FFA4                pea.l      [A6 - 0x5C]
  308. 00000370  486E FF5C                pea.l      [A6 - 0xA4]
  309. 00000374  4EBA 0300                jsr        [PC + 0x300 /* 00000676 */]
  310. 00000378  41EE FF5C                lea.l      A0, [A6 - 0xA4]
  311. 0000037C  5248                     addq.w     A0, 1
  312. 0000037E  2F08                     move.l     -[A7], A0
  313. 00000380  102E FF5C                move.b     D0, [A6 - 0xA4]
  314. 00000384  49C0                     lea.l      A4, D0
  315. 00000386  2F00                     move.l     -[A7], D0
  316. 00000388  486E FF9C                pea.l      [A6 - 0x64]
  317. 0000038C  7000                     moveq.l    D0, 0x00
  318. 0000038E  3F00                     move.w     -[A7], D0
  319. 00000390  A9CE                     syscall    TETextBox/TextBox
  320. 00000392  302E FF9E                move.w     D0, [A6 - 0x62]
  321. 00000396  48C0                     ext.l      D0
  322. 00000398  322E FFA4                move.w     D1, [A6 - 0x5C]
  323. 0000039C  48C1                     ext.l      D1
  324. 0000039E  D280                     add.l      D1, D0
  325. 000003A0  302E FFEA                move.w     D0, [A6 - 0x16]
  326. 000003A4  48C0                     ext.l      D0
  327. 000003A6  D081                     add.l      D0, D1
  328. 000003A8  5580                     subq.l     D0, 2
  329. 000003AA  322E FFD4                move.w     D1, [A6 - 0x2C]
  330. 000003AE  48C1                     ext.l      D1
  331. 000003B0  B280                     cmp.l      D1, D0
  332. 000003B2  504F                     addq.w     A7, 8
  333. 000003B4  6C06                     bge        +0x8 /* 000003BC */
  334. 000003B6  4A6E FFA4                tst.w      [A6 - 0x5C]
  335. 000003BA  6610                     bne        +0x12 /* 000003CC */
  336. label000003BC:
  337. 000003BC  4A2E FFAF                tst.b      [A6 - 0x51]
  338. 000003C0  670A                     beq        +0xC /* 000003CC */
  339. 000003C2  2F2E FFDE                move.l     -[A7], [A6 - 0x22]
  340. 000003C6  4EBA 0370                jsr        [PC + 0x370 /* 00000738 */]
  341. 000003CA  584F                     addq.w     A7, 4
  342. label000003CC:
  343. 000003CC  3D6E FFD0 FF9E           move.w     [A6 - 0x62], [A6 - 0x30]
  344. 000003D2  3D6E FFCE FF9C           move.w     [A6 - 0x64], [A6 - 0x32]
  345. 000003D8  302E FFD4                move.w     D0, [A6 - 0x2C]
  346. 000003DC  5340                     subq.w     D0, 1
  347. 000003DE  3D40 FFA2                move.w     [A6 - 0x5E], D0
  348. 000003E2  302E FFD2                move.w     D0, [A6 - 0x2E]
  349. 000003E6  5340                     subq.w     D0, 1
  350. 000003E8  3D40 FFA0                move.w     [A6 - 0x60], D0
  351. 000003EC  486E FF9C                pea.l      [A6 - 0x64]
  352. 000003F0  A8A1                     syscall    FrameRect
  353. 000003F2  302E FFD4                move.w     D0, [A6 - 0x2C]
  354. 000003F6  5340                     subq.w     D0, 1
  355. 000003F8  3F00                     move.w     -[A7], D0
  356. 000003FA  302E FFCE                move.w     D0, [A6 - 0x32]
  357. 000003FE  5440                     addq.w     D0, 2
  358. 00000400  3F00                     move.w     -[A7], D0
  359. 00000402  A893                     syscall    MoveTo
  360. 00000404  302E FFD4                move.w     D0, [A6 - 0x2C]
  361. 00000408  5340                     subq.w     D0, 1
  362. 0000040A  3F00                     move.w     -[A7], D0
  363. 0000040C  302E FFD2                move.w     D0, [A6 - 0x2E]
  364. 00000410  5340                     subq.w     D0, 1
  365. 00000412  3F00                     move.w     -[A7], D0
  366. 00000414  A891                     syscall    LineTo
  367. 00000416  302E FFD0                move.w     D0, [A6 - 0x30]
  368. 0000041A  5440                     addq.w     D0, 2
  369. 0000041C  3F00                     move.w     -[A7], D0
  370. 0000041E  302E FFD2                move.w     D0, [A6 - 0x2E]
  371. 00000422  5340                     subq.w     D0, 1
  372. 00000424  3F00                     move.w     -[A7], D0
  373. 00000426  A891                     syscall    LineTo
  374. 00000428  2053                     movea.l    A0, [A3]
  375. 0000042A  7000                     moveq.l    D0, 0x00
  376. 0000042C  1028 0011                move.b     D0, [A0 + 0x11]
  377. 00000430  0C40 00FF                cmpi.w     D0, 0xFF
  378. 00000434  6622                     bne        +0x24 /* 00000458 */
  379. 00000436  486E FFA6                pea.l      [A6 - 0x5A]
  380. 0000043A  7000                     moveq.l    D0, 0x00
  381. 0000043C  3F00                     move.w     -[A7], D0
  382. 0000043E  7204                     moveq.l    D1, 0x04
  383. 00000440  3F01                     move.w     -[A7], D1
  384. 00000442  4EBA 0416                jsr        [PC + 0x416 /* 0000085A */]
  385. 00000446  486E FFA6                pea.l      [A6 - 0x5A]
  386. 0000044A  A89D                     syscall    PenPat
  387. 0000044C  7003                     moveq.l    D0, 0x03
  388. 0000044E  3F00                     move.w     -[A7], D0
  389. 00000450  A89C                     syscall    PenMode
  390. 00000452  486E FFCE                pea.l      [A6 - 0x32]
  391. 00000456  A8A2                     syscall    PaintRect
  392. label00000458:
  393. 00000458  2053                     movea.l    A0, [A3]
  394. 0000045A  7000                     moveq.l    D0, 0x00
  395. 0000045C  1028 0011                move.b     D0, [A0 + 0x11]
  396. 00000460  4A80                     tst.l      D0
  397. 00000462  206E FFDE                movea.l    A0, [A6 - 0x22]
  398. 00000466  2050                     movea.l    A0, [A0]
  399. 00000468  3140 001A                move.w     [A0 + 0x1A], D0
  400. 0000046C  6000 01D2                bra        +0x1D4 /* 00000640 */
  401. label00000470:
  402. 00000470  7010                     moveq.l    D0, 0x10
  403. 00000472  2206                     move.l     D1, D6
  404. 00000474  E0A9                     lsr        D1, D0
  405. 00000476  5341                     subq.w     D1, 1
  406. 00000478  3D41 FFAC                move.w     [A6 - 0x54], D1
  407. 0000047C  203C 0000 FFFF           move.l     D0, 0xFFFF
  408. 00000482  C086                     and.l      D0, D6
  409. 00000484  3D40 FFAE                move.w     [A6 - 0x52], D0
  410. 00000488  558F                     subq.l     A7, 2
  411. 0000048A  2F2E FFAC                move.l     -[A7], [A6 - 0x54]
  412. 0000048E  486E FFCE                pea.l      [A6 - 0x32]
  413. 00000492  A8AD                     syscall    PtInRect
  414. 00000494  4A1F                     tst.b      [A7]+
  415. 00000496  6704                     beq        +0x6 /* 0000049C */
  416. 00000498  7001                     moveq.l    D0, 0x01
  417. 0000049A  6002                     bra        +0x4 /* 0000049E */
  418. label0000049C:
  419. 0000049C  7000                     moveq.l    D0, 0x00
  420. label0000049E:
  421. 0000049E  49C0                     lea.l      A4, D0
  422. 000004A0  2D40 FFEE                move.l     [A6 - 0x12], D0
  423. 000004A4  6000 019A                bra        +0x19C /* 00000640 */
  424. label000004A8:
  425. 000004A8  302E FFCE                move.w     D0, [A6 - 0x32]
  426. 000004AC  5240                     addq.w     D0, 1
  427. 000004AE  3D40 FF96                move.w     [A6 - 0x6A], D0
  428. 000004B2  302E FFD0                move.w     D0, [A6 - 0x30]
  429. 000004B6  5240                     addq.w     D0, 1
  430. 000004B8  3D40 FF98                move.w     [A6 - 0x68], D0
  431. 000004BC  486E FF96                pea.l      [A6 - 0x6A]
  432. 000004C0  A870                     syscall    LocalToGlobal
  433. 000004C2  2053                     movea.l    A0, [A3]
  434. 000004C4  3828 0012                move.w     D4, [A0 + 0x12]
  435. 000004C8  2F0C                     move.l     -[A7], A4
  436. 000004CA  3F04                     move.w     -[A7], D4
  437. 000004CC  7012                     moveq.l    D0, 0x12
  438. 000004CE  3F00                     move.w     -[A7], D0
  439. 000004D0  A944                     syscall    SetItmMark
  440. 000004D2  2F0C                     move.l     -[A7], A4
  441. 000004D4  A948                     syscall    CalcMenuSize
  442. 000004D6  302E FFD4                move.w     D0, [A6 - 0x2C]
  443. 000004DA  48C0                     ext.l      D0
  444. 000004DC  322E FFD0                move.w     D1, [A6 - 0x30]
  445. 000004E0  48C1                     ext.l      D1
  446. 000004E2  9081                     sub.l      D0, D1
  447. 000004E4  2054                     movea.l    A0, [A4]
  448. 000004E6  3228 0002                move.w     D1, [A0 + 0x2]
  449. 000004EA  48C1                     ext.l      D1
  450. 000004EC  9081                     sub.l      D0, D1
  451. 000004EE  5740                     subq.w     D0, 3
  452. 000004F0  3D40 FF9E                move.w     [A6 - 0x62], D0
  453. 000004F4  5EC0                     sgt        D0
  454. 000004F6  4400                     neg.b      D0
  455. 000004F8  49C0                     lea.l      A4, D0
  456. 000004FA  1D40 FFA5                move.b     [A6 - 0x5B], D0
  457. 000004FE  675A                     beq        +0x5C /* 0000055A */
  458. 00000500  598F                     subq.l     A7, 4
  459. 00000502  2F3C 7072 6F63           move.l     -[A7], 0x70726F63 /* 'proc' */
  460. 00000508  3F3C DFE0                move.w     -[A7], 0xDFE0
  461. 0000050C  A9A0                     syscall    GetResource
  462. 0000050E  2D5F FFA0                move.l     [A6 - 0x60], [A7]+
  463. 00000512  671A                     beq        +0x1C /* 0000052E */
  464. 00000514  2F2E FFA0                move.l     -[A7], [A6 - 0x60]
  465. 00000518  A9A2                     syscall    LoadResource
  466. 0000051A  206E FFA0                movea.l    A0, [A6 - 0x60]
  467. 0000051E  A029                     syscall    HLock
  468. 00000520  206E FFA0                movea.l    A0, [A6 - 0x60]
  469. 00000524  4A90                     tst.l      [A0]
  470. 00000526  6606                     bne        +0x8 /* 0000052E */
  471. 00000528  7000                     moveq.l    D0, 0x00
  472. 0000052A  2D40 FFA0                move.l     [A6 - 0x60], D0
  473. label0000052E:
  474. 0000052E  4AAE FFA0                tst.l      [A6 - 0x60]
  475. 00000532  6726                     beq        +0x28 /* 0000055A */
  476. 00000534  2054                     movea.l    A0, [A4]
  477. 00000536  226E FFA0                movea.l    A1, [A6 - 0x60]
  478. 0000053A  2251                     movea.l    A1, [A1]
  479. 0000053C  2368 0006 000C           move.l     [A1 + 0xC], [A0 + 0x6]
  480. 00000542  206E FFA0                movea.l    A0, [A6 - 0x60]
  481. 00000546  2050                     movea.l    A0, [A0]
  482. 00000548  316E FF9E 0010           move.w     [A0 + 0x10], [A6 - 0x62]
  483. 0000054E  2054                     movea.l    A0, [A4]
  484. 00000550  216E FFA0 0006           move.l     [A0 + 0x6], [A6 - 0x60]
  485. 00000556  2F0C                     move.l     -[A7], A4
  486. 00000558  A948                     syscall    CalcMenuSize
  487. label0000055A:
  488. 0000055A  206E FFDE                movea.l    A0, [A6 - 0x22]
  489. 0000055E  2050                     movea.l    A0, [A0]
  490. 00000560  3D68 0018 FFA6           move.w     [A6 - 0x5A], [A0 + 0x18]
  491. 00000566  6728                     beq        +0x2A /* 00000590 */
  492. 00000568  2F2E FFB8                move.l     -[A7], [A6 - 0x48]
  493. 0000056C  3F2E FFA6                move.w     -[A7], [A6 - 0x5A]
  494. 00000570  486E FF56                pea.l      [A6 - 0xAA]
  495. 00000574  486E FF58                pea.l      [A6 - 0xA8]
  496. 00000578  486E FFA8                pea.l      [A6 - 0x58]
  497. 0000057C  A98D                     syscall    GetDialogItem/GetDItem
  498. 0000057E  206E FFDE                movea.l    A0, [A6 - 0x22]
  499. 00000582  2050                     movea.l    A0, [A0]
  500. 00000584  3D68 000E FFAE           move.w     [A6 - 0x52], [A0 + 0xE]
  501. 0000058A  486E FFA8                pea.l      [A6 - 0x58]
  502. 0000058E  A8A4                     syscall    InvertRect
  503. label00000590:
  504. 00000590  598F                     subq.l     A7, 4
  505. 00000592  2F0C                     move.l     -[A7], A4
  506. 00000594  3F2E FF96                move.w     -[A7], [A6 - 0x6A]
  507. 00000598  3F2E FF98                move.w     -[A7], [A6 - 0x68]
  508. 0000059C  3F04                     move.w     -[A7], D4
  509. 0000059E  A80B                     syscall    PopUpMenuSelect
  510. 000005A0  2D5F FF9A                move.l     [A6 - 0x66], [A7]+
  511. 000005A4  4A6E FFA6                tst.w      [A6 - 0x5A]
  512. 000005A8  6706                     beq        +0x8 /* 000005B0 */
  513. 000005AA  486E FFA8                pea.l      [A6 - 0x58]
  514. 000005AE  A8A4                     syscall    InvertRect
  515. label000005B0:
  516. 000005B0  4A2E FFA5                tst.b      [A6 - 0x5B]
  517. 000005B4  671A                     beq        +0x1C /* 000005D0 */
  518. 000005B6  4AAE FFA0                tst.l      [A6 - 0x60]
  519. 000005BA  6714                     beq        +0x16 /* 000005D0 */
  520. 000005BC  206E FFA0                movea.l    A0, [A6 - 0x60]
  521. 000005C0  2050                     movea.l    A0, [A0]
  522. 000005C2  2254                     movea.l    A1, [A4]
  523. 000005C4  2368 000C 0006           move.l     [A1 + 0x6], [A0 + 0xC]
  524. 000005CA  206E FFA0                movea.l    A0, [A6 - 0x60]
  525. 000005CE  A02A                     syscall    HUnlock
  526. label000005D0:
  527. 000005D0  206E FFDE                movea.l    A0, [A6 - 0x22]
  528. 000005D4  2050                     movea.l    A0, [A0]
  529. 000005D6  4228 0014                clr.b      [A0 + 0x14]
  530. 000005DA  2F0C                     move.l     -[A7], A4
  531. 000005DC  3F04                     move.w     -[A7], D4
  532. 000005DE  7000                     moveq.l    D0, 0x00
  533. 000005E0  3F00                     move.w     -[A7], D0
  534. 000005E2  A944                     syscall    SetItmMark
  535. 000005E4  02AE 0000 FFFF FF9A      andi.l     [A6 - 0x66], 0xFFFF
  536. 000005EC  4AAE FF9A                tst.l      [A6 - 0x66]
  537. 000005F0  674E                     beq        +0x50 /* 00000640 */
  538. 000005F2  2053                     movea.l    A0, [A3]
  539. 000005F4  3028 0012                move.w     D0, [A0 + 0x12]
  540. 000005F8  48C0                     ext.l      D0
  541. 000005FA  B0AE FF9A                cmp.l      D0, [A6 - 0x66]
  542. 000005FE  56C0                     sne        D0
  543. 00000600  4400                     neg.b      D0
  544. 00000602  49C0                     lea.l      A4, D0
  545. 00000604  1D40 FFA4                move.b     [A6 - 0x5C], D0
  546. 00000608  6736                     beq        +0x38 /* 00000640 */
  547. 0000060A  2F0B                     move.l     -[A7], A3
  548. 0000060C  3F2E FF9C                move.w     -[A7], [A6 - 0x64]
  549. 00000610  A963                     syscall    SetControlValue/SetCtlValue
  550. 00000612  486E FFCE                pea.l      [A6 - 0x32]
  551. 00000616  A928                     syscall    InvalRect
  552. 00000618  206E FFDE                movea.l    A0, [A6 - 0x22]
  553. 0000061C  2050                     movea.l    A0, [A0]
  554. 0000061E  117C 0001 0014           move.b     [A0 + 0x14], 0x1
  555. 00000624  601A                     bra        +0x1C /* 00000640 */
  556. label00000626:
  557. 00000626  203C 00FF FFFF           move.l     D0, 0xFFFFFF
  558. 0000062C  C086                     and.l      D0, D6
  559. 0000062E  2F00                     move.l     -[A7], D0
  560. 00000630  486E FFCE                pea.l      [A6 - 0x32]
  561. 00000634  A8DF                     syscall    RectRgn
  562. 00000636  6008                     bra        +0xA /* 00000640 */
  563. label00000638:
  564. 00000638  2F06                     move.l     -[A7], D6
  565. 0000063A  486E FFCE                pea.l      [A6 - 0x32]
  566. 0000063E  A8DF                     syscall    RectRgn
  567. label00000640:
  568. 00000640  486E FFBC                pea.l      [A6 - 0x44]
  569. 00000644  A899                     syscall    SetPenState
  570. 00000646  4A05                     tst.b      D5
  571. 00000648  6708                     beq        +0xA /* 00000652 */
  572. 0000064A  486E FFF4                pea.l      [A6 - 0xC]
  573. 0000064E  AA14                     syscall    RGBForeColor
  574. 00000650  6006                     bra        +0x8 /* 00000658 */
  575. label00000652:
  576. 00000652  2F2E FFDA                move.l     -[A7], [A6 - 0x26]
  577. 00000656  A862                     syscall    ForeColor
  578. label00000658:
  579. 00000658  3F2E FFF2                move.w     -[A7], [A6 - 0xE]
  580. 0000065C  A889                     syscall    TextMode
  581. 0000065E  2F2E FFB4                move.l     -[A7], [A6 - 0x4C]
  582. 00000662  A873                     syscall    SetPort
  583. 00000664  2D6E FFEE 0014           move.l     [A6 + 0x14], [A6 - 0x12]
  584. 0000066A  4CEE 18F0 FF3E           movem.l    D4,D5,D6,D7,A3,A4, [A6 - 0xC2]
  585. 00000670  4E5E                     unlink     A6
  586. 00000672  4E74 000C                rtd        0x000C
  587. fn00000676:
  588. 00000676  4E56 FF00                link       A6, -0x0100
  589. 0000067A  48E7 0F38                movem.l    -[A7], D4,D5,D6,D7,A2,A3,A4
  590. 0000067E  266E 000C                movea.l    A3, [A6 + 0xC]
  591. 00000682  49EE FF00                lea.l      A4, [A6 - 0x100]
  592. 00000686  4247                     clr.w      D7
  593. 00000688  78C9                     moveq.l    D4, 0xFFFFFFC9
  594. 0000068A  4245                     clr.w      D5
  595. 0000068C  7C01                     moveq.l    D6, 0x01
  596. 0000068E  4A53                     tst.w      [A3]
  597. 00000690  6E0C                     bgt        +0xE /* 0000069E */
  598. 00000692  206E 0008                movea.l    A0, [A6 + 0x8]
  599. 00000696  4210                     clr.b      [A0]
  600. 00000698  4253                     clr.w      [A3]
  601. 0000069A  6000 0092                bra        +0x94 /* 0000072E */
  602. label0000069E:
  603. 0000069E  206E 0008                movea.l    A0, [A6 + 0x8]
  604. 000006A2  224C                     movea.l    A1, A4
  605. 000006A4  2448                     movea.l    A2, A0
  606. 000006A6  7000                     moveq.l    D0, 0x00
  607. 000006A8  1012                     move.b     D0, [A2]
  608. 000006AA  5240                     addq.w     D0, 1
  609. 000006AC  48C0                     ext.l      D0
  610. 000006AE  A02E                     syscall    BlockMove/BlockMoveData
  611. 000006B0  558F                     subq.l     A7, 2
  612. 000006B2  2F0C                     move.l     -[A7], A4
  613. 000006B4  A88C                     syscall    StringWidth
  614. 000006B6  3E1F                     move.w     D7, [A7]+
  615. 000006B8  BE53                     cmp.w      D7, [A3]
  616. 000006BA  6F70                     ble        +0x72 /* 0000072C */
  617. 000006BC  0C78 0700 015A           cmpi.w     [0x0000015A /* SysVersion */], 0x700
  618. 000006C2  6D22                     blt        +0x24 /* 000006E6 */
  619. 000006C4  558F                     subq.l     A7, 2
  620. 000006C6  3F13                     move.w     -[A7], [A3]
  621. 000006C8  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  622. 000006CC  7000                     moveq.l    D0, 0x00
  623. 000006CE  3F00                     move.w     -[A7], D0
  624. 000006D0  2F3C 8208 FFE0           move.l     -[A7], 0x8208FFE0
  625. 000006D6  A8B5                     syscall    ScriptUtil
  626. 000006D8  558F                     subq.l     A7, 2
  627. 000006DA  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  628. 000006DE  A88C                     syscall    StringWidth
  629. 000006E0  3E1F                     move.w     D7, [A7]+
  630. 000006E2  544F                     addq.w     A7, 2
  631. 000006E4  6046                     bra        +0x48 /* 0000072C */
  632. label000006E6:
  633. 000006E6  558F                     subq.l     A7, 2
  634. 000006E8  4884                     ext.w      D4
  635. 000006EA  3F04                     move.w     -[A7], D4
  636. 000006EC  A88D                     syscall    CharWidth
  637. 000006EE  3A1F                     move.w     D5, [A7]+
  638. 000006F0  6026                     bra        +0x28 /* 00000718 */
  639. label000006F2:
  640. 000006F2  BE53                     cmp.w      D7, [A3]
  641. 000006F4  6F16                     ble        +0x18 /* 0000070C */
  642. 000006F6  7000                     moveq.l    D0, 0x00
  643. 000006F8  1014                     move.b     D0, [A4]
  644. 000006FA  4A80                     tst.l      D0
  645. 000006FC  671E                     beq        +0x20 /* 0000071C */
  646. 000006FE  5314                     subq.b     [A4], 1
  647. 00000700  558F                     subq.l     A7, 2
  648. 00000702  2F0C                     move.l     -[A7], A4
  649. 00000704  A88C                     syscall    StringWidth
  650. 00000706  3E05                     move.w     D7, D5
  651. 00000708  DE5F                     add.w      D7, [A7]+
  652. 0000070A  600C                     bra        +0xE /* 00000718 */
  653. label0000070C:
  654. 0000070C  5214                     addq.b     [A4], 1
  655. 0000070E  7000                     moveq.l    D0, 0x00
  656. 00000710  1014                     move.b     D0, [A4]
  657. 00000712  1984 0000                move.b     [A4 + D0.w], D4
  658. 00000716  4206                     clr.b      D6
  659. label00000718:
  660. 00000718  4A06                     tst.b      D6
  661. 0000071A  66D6                     bne        -0x28 /* 000006F2 */
  662. label0000071C:
  663. 0000071C  204C                     movea.l    A0, A4
  664. 0000071E  226E 0008                movea.l    A1, [A6 + 0x8]
  665. 00000722  7000                     moveq.l    D0, 0x00
  666. 00000724  1014                     move.b     D0, [A4]
  667. 00000726  5240                     addq.w     D0, 1
  668. 00000728  48C0                     ext.l      D0
  669. 0000072A  A02E                     syscall    BlockMove/BlockMoveData
  670. label0000072C:
  671. 0000072C  3687                     move.w     [A3], D7
  672. label0000072E:
  673. 0000072E  4CEE 1CF0 FEE4           movem.l    D4,D5,D6,D7,A2,A3,A4, [A6 - 0x11C]
  674. 00000734  4E5E                     unlink     A6
  675. 00000736  4E75                     rts
  676. fn00000738:
  677. 00000738  4E56 FFE8                link       A6, -0x0018
  678. 0000073C  48E7 0F18                movem.l    -[A7], D4,D5,D6,D7,A3,A4
  679. 00000740  266E 0008                movea.l    A3, [A6 + 0x8]
  680. 00000744  7000                     moveq.l    D0, 0x00
  681. 00000746  2840                     movea.l    A4, D0
  682. 00000748  2053                     movea.l    A0, [A3]
  683. 0000074A  43EE FFF8                lea.l      A1, [A6 - 0x8]
  684. 0000074E  41E8 000C                lea.l      A0, [A0 + 0xC]
  685. 00000752  22D8                     move.l     [A1]+, [A0]+
  686. 00000754  22D8                     move.l     [A1]+, [A0]+
  687. 00000756  2053                     movea.l    A0, [A3]
  688. 00000758  3C28 0008                move.w     D6, [A0 + 0x8]
  689. 0000075C  3D6E FFFA FFF2           move.w     [A6 - 0xE], [A6 - 0x6]
  690. 00000762  3D6E FFF8 FFF0           move.w     [A6 - 0x10], [A6 - 0x8]
  691. 00000768  322E FFFE                move.w     D1, [A6 - 0x2]
  692. 0000076C  5341                     subq.w     D1, 1
  693. 0000076E  3D41 FFF6                move.w     [A6 - 0xA], D1
  694. 00000772  322E FFFC                move.w     D1, [A6 - 0x4]
  695. 00000776  5341                     subq.w     D1, 1
  696. 00000778  3D41 FFF4                move.w     [A6 - 0xC], D1
  697. 0000077C  322E FFFE                move.w     D1, [A6 - 0x2]
  698. 00000780  48C1                     ext.l      D1
  699. 00000782  48C6                     ext.l      D6
  700. 00000784  9286                     sub.l      D1, D6
  701. 00000786  5B41                     subq.w     D1, 5
  702. 00000788  3D41 FFEA                move.w     [A6 - 0x16], D1
  703. 0000078C  322E FFF8                move.w     D1, [A6 - 0x8]
  704. 00000790  5241                     addq.w     D1, 1
  705. 00000792  3D41 FFE8                move.w     [A6 - 0x18], D1
  706. 00000796  322E FFFE                move.w     D1, [A6 - 0x2]
  707. 0000079A  5B41                     subq.w     D1, 5
  708. 0000079C  3D41 FFEE                move.w     [A6 - 0x12], D1
  709. 000007A0  322E FFFC                move.w     D1, [A6 - 0x4]
  710. 000007A4  5541                     subq.w     D1, 2
  711. 000007A6  3D41 FFEC                move.w     [A6 - 0x14], D1
  712. 000007AA  3A2E FFF6                move.w     D5, [A6 - 0xA]
  713. 000007AE  9A6E FFF2                sub.w      D5, [A6 - 0xE]
  714. 000007B2  382E FFEC                move.w     D4, [A6 - 0x14]
  715. 000007B6  986E FFE8                sub.w      D4, [A6 - 0x18]
  716. 000007BA  3E06                     move.w     D7, D6
  717. 000007BC  3207                     move.w     D1, D7
  718. 000007BE  E441                     asr        D1.w, 2
  719. 000007C0  9E41                     sub.w      D7, D1
  720. 000007C2  0807 0000                btst.b     D7, 0x0
  721. 000007C6  6704                     beq        +0x6 /* 000007CC */
  722. 000007C8  3007                     move.w     D0, D7
  723. 000007CA  5247                     addq.w     D7, 1
  724. label000007CC:
  725. 000007CC  48C5                     ext.l      D5
  726. 000007CE  48C6                     ext.l      D6
  727. 000007D0  2006                     move.l     D0, D6
  728. 000007D2  5C80                     addq.l     D0, 6
  729. 000007D4  B085                     cmp.l      D0, D5
  730. 000007D6  6F12                     ble        +0x14 /* 000007EA */
  731. 000007D8  48C5                     ext.l      D5
  732. 000007DA  48C7                     ext.l      D7
  733. 000007DC  2005                     move.l     D0, D5
  734. 000007DE  9087                     sub.l      D0, D7
  735. 000007E0  E280                     asr        D0, 1
  736. 000007E2  D06E FFF2                add.w      D0, [A6 - 0xE]
  737. 000007E6  3D40 FFEA                move.w     [A6 - 0x16], D0
  738. label000007EA:
  739. 000007EA  3A07                     move.w     D5, D7
  740. 000007EC  E245                     asr        D5.w, 1
  741. 000007EE  3007                     move.w     D0, D7
  742. 000007F0  D06E FFEA                add.w      D0, [A6 - 0x16]
  743. 000007F4  3D40 FFEE                move.w     [A6 - 0x12], D0
  744. 000007F8  48C4                     ext.l      D4
  745. 000007FA  48C5                     ext.l      D5
  746. 000007FC  2004                     move.l     D0, D4
  747. 000007FE  9085                     sub.l      D0, D5
  748. 00000800  E280                     asr        D0, 1
  749. 00000802  D16E FFE8                add.w      [A6 - 0x18], D0
  750. 00000806  3005                     move.w     D0, D5
  751. 00000808  D06E FFE8                add.w      D0, [A6 - 0x18]
  752. 0000080C  3D40 FFEC                move.w     [A6 - 0x14], D0
  753. 00000810  598F                     subq.l     A7, 4
  754. 00000812  A8CB                     syscall    OpenPoly
  755. 00000814  285F                     movea.l    A4, [A7]+
  756. 00000816  2F2E FFE8                move.l     -[A7], [A6 - 0x18]
  757. 0000081A  A893                     syscall    MoveTo
  758. 0000081C  3F2E FFEE                move.w     -[A7], [A6 - 0x12]
  759. 00000820  3F2E FFE8                move.w     -[A7], [A6 - 0x18]
  760. 00000824  A891                     syscall    LineTo
  761. 00000826  302E FFEE                move.w     D0, [A6 - 0x12]
  762. 0000082A  48C0                     ext.l      D0
  763. 0000082C  322E FFEA                move.w     D1, [A6 - 0x16]
  764. 00000830  48C1                     ext.l      D1
  765. 00000832  D280                     add.l      D1, D0
  766. 00000834  E281                     asr        D1, 1
  767. 00000836  3F01                     move.w     -[A7], D1
  768. 00000838  3F2E FFEC                move.w     -[A7], [A6 - 0x14]
  769. 0000083C  A891                     syscall    LineTo
  770. 0000083E  2F2E FFE8                move.l     -[A7], [A6 - 0x18]
  771. 00000842  A891                     syscall    LineTo
  772. 00000844  A8CC                     syscall    ClosePoly/ClosePgon
  773. 00000846  2F0C                     move.l     -[A7], A4
  774. 00000848  A8C7                     syscall    PaintPoly
  775. 0000084A  2F0C                     move.l     -[A7], A4
  776. 0000084C  A8CD                     syscall    KillPoly
  777. 0000084E  A89E                     syscall    PenNormal
  778. 00000850  4CEE 18F0 FFD0           movem.l    D4,D5,D6,D7,A3,A4, [A6 - 0x30]
  779. 00000856  4E5E                     unlink     A6
  780. 00000858  4E75                     rts
  781. fn0000085A:
  782. 0000085A  4E56 0000                link       A6, 0
  783. 0000085E  594F                     subq.w     A7, 4
  784. 00000860  2F3C 5041 5423           move.l     -[A7], 0x50415423 /* 'PAT#' */
  785. 00000866  3F2E 000A                move.w     -[A7], [A6 + 0xA]
  786. 0000086A  A9A0                     syscall    GetResource
  787. 0000086C  226E 000C                movea.l    A1, [A6 + 0xC]
  788. 00000870  201F                     move.l     D0, [A7]+
  789. 00000872  671C                     beq        +0x1E /* 00000890 */
  790. 00000874  2040                     movea.l    A0, D0
  791. 00000876  2050                     movea.l    A0, [A0]
  792. 00000878  3018                     move.w     D0, [A0]+
  793. 0000087A  322E 0008                move.w     D1, [A6 + 0x8]
  794. 0000087E  6710                     beq        +0x12 /* 00000890 */
  795. 00000880  B240                     cmp.w      D1, D0
  796. 00000882  620C                     bhi        +0xE /* 00000890 */
  797. label00000884:
  798. 00000884  5341                     subq.w     D1, 1
  799. 00000886  6704                     beq        +0x6 /* 0000088C */
  800. 00000888  5048                     addq.w     A0, 8
  801. 0000088A  60F8                     bra        -0x6 /* 00000884 */
  802. label0000088C:
  803. 0000088C  22D8                     move.l     [A1]+, [A0]+
  804. 0000088E  2290                     move.l     [A1], [A0]
  805. label00000890:
  806. 00000890  4E5E                     unlink     A6
  807. 00000892  205F                     movea.l    A0, [A7]+
  808. 00000894  508F                     addq.l     A7, 8
  809. 00000896  4ED0                     jmp        [A0]
  810.